home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 August / Chip_2001-08_cd2.bin / kancelar / text2pdf / SETUPT2P.EXE / {app} / frmSplash.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  2001-04-17  |  2.6 KB  |  87 lines
  1. VERSION 5.00
  2. Begin VB.Form frmSplash 
  3.    BackColor       =   &H00000000&
  4.    BorderStyle     =   3  'Fixed Dialog
  5.    ClientHeight    =   2970
  6.    ClientLeft      =   255
  7.    ClientTop       =   1410
  8.    ClientWidth     =   6000
  9.    ClipControls    =   0   'False
  10.    ControlBox      =   0   'False
  11.    Icon            =   "frmSplash.frx":0000
  12.    KeyPreview      =   -1  'True
  13.    LinkTopic       =   "Form2"
  14.    MaxButton       =   0   'False
  15.    MinButton       =   0   'False
  16.    Picture         =   "frmSplash.frx":000C
  17.    ScaleHeight     =   188.571
  18.    ScaleMode       =   0  'User
  19.    ScaleWidth      =   392.157
  20.    ShowInTaskbar   =   0   'False
  21.    StartUpPosition =   2  'CenterScreen
  22.    Begin VB.Timer Timer1 
  23.       Enabled         =   0   'False
  24.       Interval        =   5000
  25.       Left            =   4080
  26.       Top             =   120
  27.    End
  28.    Begin VB.Label Label1 
  29.       BackStyle       =   0  'Transparent
  30.       BeginProperty Font 
  31.          Name            =   "Arial"
  32.          Size            =   8.25
  33.          Charset         =   0
  34.          Weight          =   400
  35.          Underline       =   0   'False
  36.          Italic          =   0   'False
  37.          Strikethrough   =   0   'False
  38.       EndProperty
  39.       ForeColor       =   &H00C0FFFF&
  40.       Height          =   315
  41.       Left            =   120
  42.       TabIndex        =   1
  43.       Top             =   3360
  44.       Width           =   4875
  45.    End
  46.    Begin VB.Label lblCopyright 
  47.       BackStyle       =   0  'Transparent
  48.       Caption         =   "Copyright 2000-2001 - Fytek, Inc."
  49.       BeginProperty Font 
  50.          Name            =   "Arial"
  51.          Size            =   8.25
  52.          Charset         =   0
  53.          Weight          =   400
  54.          Underline       =   0   'False
  55.          Italic          =   0   'False
  56.          Strikethrough   =   0   'False
  57.       EndProperty
  58.       ForeColor       =   &H00FFFFFF&
  59.       Height          =   255
  60.       Left            =   240
  61.       TabIndex        =   0
  62.       Top             =   2640
  63.       Width           =   2415
  64.    End
  65. Attribute VB_Name = "frmSplash"
  66. Attribute VB_GlobalNameSpace = False
  67. Attribute VB_Creatable = False
  68. Attribute VB_PredeclaredId = True
  69. Attribute VB_Exposed = False
  70. Private Sub Form_Click()
  71. CloseForm
  72. End Sub
  73. Private Sub Form_KeyPress(KeyAscii As Integer)
  74. CloseForm
  75. End Sub
  76. Private Sub Form_Load()
  77. lblVersion = "Version " & App.Major & "." & App.Minor
  78. Timer1.Enabled = True
  79. End Sub
  80. Private Sub Timer1_Timer()
  81. CloseForm
  82. End Sub
  83. Public Sub CloseForm()
  84. Unload Me
  85. pdfmain.Show
  86. End Sub
  87.